Don't show help hint for evil operators
authorjustbur <justin@burkett.cc>
Fri, 30 Oct 2015 01:06:48 +0000 (21:06 -0400)
committerjustbur <justin@burkett.cc>
Fri, 30 Oct 2015 01:10:37 +0000 (21:10 -0400)
Paging and help doesn't work for these, so don't offer

which-key.el

index ddced1974f8bd615a3f426b4f3fbb24efa3630b1..fa240388ef5eb7e899fa105026611ce0af3d0bfb 100644 (file)
@@ -1371,9 +1371,12 @@ area."
          (next-page-n (format "pg %s" (1+ (mod (1+ page-n) n-pages))))
          (use-descbind (and which-key--on-last-page which-key-use-C-h-for-paging
                             which-key-prevent-C-h-from-cycling)))
-    (when (or (and (< 1 n-pages) which-key-use-C-h-for-paging)
-              (and (< 1 n-pages) paging-key-bound)
-              use-descbind)
+    (when (and (or (and (< 1 n-pages) which-key-use-C-h-for-paging)
+                   (and (< 1 n-pages) paging-key-bound)
+                   use-descbind)
+               (not (and which-key-allow-evil-operators
+                         (boundp 'evil-this-operator)
+                         evil-this-operator)))
       (propertize (format "[%s %s]" key
                           (if use-descbind "help" next-page-n))
                   'face 'which-key-note-face))))